home *** CD-ROM | disk | FTP | other *** search
/ PC Team 23 / HS_Tuning.iso / Optimisation / JV16 Powertools 1.6 / Setup.exe / {app} / Documentation / Example Scripts / 2. Hello worlds / Hello World v5.jvb < prev   
Encoding:
Text File  |  2003-05-12  |  355 b   |  15 lines

  1. If ([ShowMessageEx Info YesNo "Would you like me to say Hello World?"] = Yes) 
  2. [
  3.  
  4.  Define count;
  5.  Count := [InputBox "Hello world" "How many times you would like me to say it?" "2"];
  6.  
  7.  If ([IsNumber $Count] = No) 
  8.  [
  9.   ShowMessage Hey, $Count is not a number...;
  10.   Terminate;
  11.  ]
  12.  
  13.  For (i := 1 to $Count, +1) [ ShowMessage Hello World!; ]
  14.  
  15. ]